home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Magnum One
/
Magnum One (Mid-American Digital) (Disc Manufacturing).iso
/
d20
/
btd_301.arc
/
BTD1.BAT
< prev
next >
Wrap
DOS Batch File
|
1991-11-30
|
4KB
|
220 lines
echo off
cls
: *******************************************************
: This batch file handles both EXIT modes traps every BTD
: errorlevel exit, but does nothing with most of them
: this is up to you...
: *******************************************************
: Start up your FOSSIL
btf1m -m-
: Start up BTD with your configuration file
:loop
btd btd.cfg
echo .
: Check all returned errorlevels
: This from Maximus
if errorlevel = 255 goto maxerr
: These are ours -general
if errorlevel = 254 goto syntaxerr
if errorlevel = 253 goto noconfig
if errorlevel = 252 goto nofossil
if errorlevel = 251 goto badmodem
if errorlevel = 250 goto sysopexit
if errorlevel = 249 goto badstats
if errorlevel = 248 goto spawnerr
if errorlevel = 246 goto memfail
if errorlevel = 240 goto midnight
: Trap user exit levels
if errorlevel = 30 goto userexit
: These are ours - exit mode specific
if errorlevel = 29 goto bunknown
if errorlevel = 28 goto b38400
if errorlevel = 27 goto b19200
if errorlevel = 26 goto b9600
if errorlevel = 25 goto b4800
if errorlevel = 24 goto b2400
if errorlevel = 23 goto b1200
if errorlevel = 22 goto b600
if errorlevel = 21 goto b300
if errorlevel = 20 goto b7200
if errorlevel = 19 goto b1275
if errorlevel = 18 goto bbslocal
: These are from Maximus
if errorlevel = 16 goto stackerr
if errorlevel = 12 goto echonet
if errorlevel = 11 goto netmail
if errorlevel = 5 goto notechonet
if errorlevel = 4 goto maxerr3
if errorlevel = 3 goto maxerr2
if errorlevel = 2 goto callergone
if errorlevel = 1 goto maxerr1
echo ALL OKAY...
goto loop
:maxerr
echo Max: MAXIMUS error
goto exit
:syntaxerr
echo BTD: Syntax error
goto exit
:noconfig
echo BTD: No config file specified
goto exit
:nofossil
echo BTD: No FOSSIL installed
goto exit
:badmodem
echo BTD: Problem with modem
goto exit
:sysopexit
echo BTD: BTD terminated by Sysop
goto exit
:badstats
echo BTD: Problem with statistics file
goto exit
:midnight
echo BTD: Midnight rollover
goto loop
:memfail
echo BTD: DOS memory failure
goto exit
:spawnerr
echo BTD: DOS spawn error
goto exit
:userexit
echo BTD: User event exit (30-239)
: THIS IS UP TO YOU !!
goto loop
:bbslocal
echo BTD: local logon
max -k -n1 -lMAX.LOG
goto maxcheck
:bunknown
echo BTD: Unknown remote logon speed
: THIS IS UP TO YOU !!
goto maxcheck
:b38400
echo BTD: Remote logon at 38400
max -b38400 -n1 -p1 -lMAX.LOG
goto maxcheck
:b19200
echo BTD: Remote logon at 19200
max -b19200 -n1 -p1 -lMAX.LOG
goto maxcheck
:b9600
echo BTD: Remote logon at 9600
max -b9600 -n1 -p1 -lMAX.LOG
goto maxcheck
:b7200
echo BTD: Remote logon at 7200
max -b7200 -n1 -p1 -lMAX.LOG
goto maxcheck
:b4800
echo BTD: Remote logon at 4800
max -b4800 -n1 -p1 -lMAX.LOG
goto maxcheck
:b2400
echo BTD: Remote logon at 2400
max -b2400 -n1 -p1 -lMAX.LOG
goto maxcheck
:b1275
echo BTD: Remote logon at 1275
max -b1275 -n1 -p1 -lMAX.LOG
goto maxcheck
:b1200
echo BTD: Remote logon at 1200
max -b1200 -n1 -p1 -lMAX.LOG
goto maxcheck
:b600
echo BTD: Remote logon at 600
max -b600 -n1 -p1 -lMAX.LOG
goto maxcheck
:b300
echo BTD: Remote logon at 300
max -b300 -n1 -p1 -lMAX.LOG
:maxcheck
if errorlevel = 254 goto syntaxerr
if errorlevel = 16 goto stackerr
if errorlevel = 12 goto echonet
if errorlevel = 11 goto netmail
if errorlevel = 5 goto notechonet
if errorlevel = 4 goto maxerr3
if errorlevel = 3 goto maxerr2
if errorlevel = 2 goto callergone
if errorlevel = 1 goto maxerr1
goto loop
:stackerr
echo Max: internal stack error
goto exit
:echonet
echo Max: Echo/Net Mail entered
: THIS IS UP TO YOU !!
goto loop
:netmail
echo Max: Net Mail entered
: THIS IS UP TO YOU !!
goto loop
:notechonet
echo Max: No Echo/Net Mail entered
: THIS IS UP TO YOU !!
goto loop
:maxerr3
echo Max: Error Condition 3
goto exit
:maxerr2
echo Max: Error Condition 2
goto exit
:callergone
echo Max: Caller vanished during log-on
goto loop
:maxerr1
echo Max: Error condition 1
:exit
btf1m -u